home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / mac / MACF / MGER.DIR / 00219_Script_219 < prev    next >
Text File  |  1995-10-10  |  916b  |  46 lines
  1.  
  2. on mouseUp
  3.   global prev,gSound,MovieSeq,gSpeed
  4.   
  5.   repeat with x = 3 to 5 
  6.     puppetSprite x,TRUE
  7.     set the visible of sprite x to FALSE
  8.     puppetSprite x,FALSE
  9.   end repeat
  10.   
  11.   puppetSprite 3,TRUE
  12.   set the visible of sprite 3 to TRUE
  13.   puppetSprite 3, FALSE
  14.   updateStage
  15.   
  16.   set gSpeed = 1
  17.   if prev>0 then
  18.     set prev = 0
  19.     set the visible of sprite 19 to FALSE
  20.     repeat with x = 13 to 18
  21.       set the visible of sprite x to TRUE
  22.       puppetSprite x,FALSE
  23.     end repeat
  24.     
  25.   end if
  26.   
  27.   set the SoundLevel = gSound
  28.   puppetSound "OPEN.AIF"
  29.   updateStage
  30.   stopQT
  31.   repeat with x = 3 to 7
  32.     set the visible of sprite x to TRUE
  33.     puppetSprite x,FALSE
  34.   end repeat
  35.   
  36.   set MovieSeq = FALSE
  37.   setbar
  38.   repeat with x = 46 to 47
  39.     puppetSprite x,TRUE
  40.     set the visible of sprite x to FALSE
  41.     puppetSprite x,FALSE
  42.   end repeat
  43.   
  44.   go "no"
  45. end
  46.